Ulozeni MailMessage do souboru

Otázka od: max_konference@post.cz

17. 9. 2002 19:34

Potrebuju co nejjednoduseji ulozit v B5 celej MailMessage do
souboru, ale nejak se mi to nedari. Jde to jedine, kdyz to rozdelim
na body->Text, .... delam to:
FileCreate(IntToStr(jmeno)+".md~");
handle = FileOpen(IntToStr(jmeno)+".md~",fmOpenReadWrite);
int velikost =sizeof(NMPOP31->MailMessage);
FileWrite(handle, NMPOP31->MailMessage, velikost);
FileClose(handle);

ale takhle jednoduse to nejde. Nejsem si jistej, ale v D to nejspis
slo. Dik

Odpovedá: Blazek Jaroslav

17. 9. 2002 21:05

Ahoj,

> max_konference@post.cz 17.9.02 20:34 >>>
>Potrebuju co nejjednoduseji ulozit v B5 celej MailMessage do
>na body->Text, .... delam to:
>int velikost =sizeof(NMPOP31->MailMessage);

tady ziskas jen velikost ukazatele

object do souboru neulozis...
nejjednodussi je si udelat nejakou svoji fci

void __fastcall SaveMailMessage(const AnsiString AFile, TMailMessage *AMsg)
{
TStringList *SList = new TStringList();
try
  {
   SList->Add("[Subject]");
   SList->Add(AMsg->Subject);
   SList->Add("[Body]");
   SList->AddStrings(AMsg->Body);
   SList->SaveToFile(AFile);
// ...
  }
__finally
  {
   delete SList;
  }
}

S pozdravem

Bc. Jaroslav Blazek
Access-IT Ceska Lipa
mailto:jaroslav.blazek@access-it.cz
http://www.access-it.cz
ICQ# : 133673990
+420605/813644